home *** CD-ROM | disk | FTP | other *** search
/ Aminet 21 / Aminet 21 (1997)(GTI - Schatztruhe)[!][Oct 1997].iso / Aminet / mus / misc / MTRS.lha / Install-MTRS_DEMO < prev    next >
Encoding:
Text File  |  1980-01-15  |  1.8 KB  |  63 lines
  1.  
  2. ; Installer-Script MTRS_DEMO A.Sprenger 1997
  3.  
  4. (set @askdefault "Work:")
  5. (set @askhelp "\n  Bitte wählen Sie ein Verzeichnis,\n  in welches MTRS_DEMO kopiert werden soll.")
  6. (set @askprompt "Verzeichnisangabe für MTRS_DEMO\n")
  7. (set @bad-kick "MTRS benötigt mindestens\nKickstart 2.0 !")
  8.  
  9. (if (< (/ (getversion) 65536) 37)
  10.     (abort @bad-kick)
  11. )
  12.  
  13. (welcome)
  14. (message "\n\n\nDieses Script installiert\nMTRS_DEMO\nauf Ihre Festplatte.")
  15. (complete 0)
  16. (set @destination (askdir (prompt @askprompt)
  17.               (help @askhelp)
  18.           (default @askdefault)
  19.           )
  20.     )
  21.  
  22. (set @destination (expandpath @destination))
  23. (set @destination (tackon @destination "MTRS"))
  24. (copyfiles (prompt "Kopiervorgang")
  25.        (help "")
  26.        (source "")
  27.        (dest @destination)
  28.        (infos)
  29.        (pattern "MTRS_V1.1_DEMO")
  30.       )
  31. (complete 40)
  32. (copyfiles (prompt "Kopiervorgang")
  33.        (help "Möchten Sie die Anleitung kopieren ?")
  34.        (source "")
  35.        (dest @destination)
  36.        (infos)
  37.        (confirm)
  38.        (pattern "MTRS-Anleitung")
  39.       )
  40. (complete 80)
  41. (set @destination (tackon @destination "HDR"))
  42. (makedir @destination)
  43.  
  44. (set changechoice
  45.                   (askchoice
  46.                              (prompt "MTRS benötigt das logische Gerät >HDR:<.\nWenn es beim Start des Rechners automatisch\neingerichtet werden soll,wählen Sie bitte >User-Startup verändern<")
  47.                  (help "")
  48.                  (choices "User-Startup verändern" "Gerät per Hand zuweisen")
  49.                 )
  50.          )
  51. (if (not changechoice)
  52.     (startup "MTRS" (prompt "Es wird die User-Startup verändert.")
  53.                 (help "")
  54.                 (command "ASSIGN HDR: " (expandpath (@destination)))
  55.                    )
  56.     )
  57. (complete 100)
  58. (makeassign "HDR" @destination)
  59. (message "Die Installation ist abgeschlossen. Zur Programmbedienung und Registrierung lesen Sie bitte die beigefügte Anleitung im Amiga-Guide-Format.\nViel Spaß wünscht A.Sprenger.")
  60.  
  61.  
  62.  
  63.